home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1996 #6 / Amiga Plus CD - 1996 - No. 06.iso / pd / texte / texfontinst / contrib / zd / italhax2.mtx < prev    next >
Text File  |  1996-07-30  |  1KB  |  49 lines
  1. %%% fontinst-file:  italhax2.mtx
  2. %%% version:        1.0a
  3. %%% date:           94/07/26
  4. %%% author:         Constantin Kahn <kahn@math.uni-hannover.de>
  5. %%% abtract:          This file cleans up the mess created by italhax1.mtx.
  6.  
  7. \relax
  8.  
  9. \metrics
  10.  
  11. % Uses the fontinst package.
  12.  
  13. \needsfontinstversion{1.331}
  14.  
  15. % Reset `TEX TEXT' and `TEX TYPEWRITER TEXT' encodings to factory standard
  16.  
  17. \declareencoding{TEX TEXT}{OT1}
  18. \declareencoding{TEX TYPEWRITER TEXT}{OT1tt}
  19.  
  20. % Check whether we have read an .mtx file based on OT1 or OT1tt encoding;
  21. % If so, we complain and try to fix up the situation for the user. Sigh.
  22.  
  23. \ifisglyph{dollar}\then % dumb, dumb, dumb ...
  24.  
  25.    \message{}
  26.    \message{Warning (italhax2): The previously read metrics contained 
  27.       a `dollar'}
  28.    \message{glyph instead of a `sterling' glyph. This should be corrected by}
  29.    \message{removing the .mtx file, allowing it to be regenerated.}
  30.    \message{}
  31.  
  32.    \setglyph{sterling}
  33.       \glyph{dollar}{1000}
  34.    \endsetglyph
  35.    
  36. \fi
  37.  
  38. \ifisglyph{dollar-saved}\then
  39.    \resetglyph{dollar}
  40.       \glyph{dollar-saved}{1000}
  41.    \endsetglyph
  42. \else
  43.    \unsetglyph{dollar}
  44. \fi
  45.    
  46. \unsetglyph{dollar-saved}
  47.  
  48. \endmetrics
  49.